UC知道这个软件的原理``求高手
来源：百度知道 编辑：UC知道 时间：2024/05/25 11:32:58
再过几个月我就去上大学了(学习软件),网上看见这个东西很感兴趣,可是我一窍不通,麻烦大哥哥大姐姐给解释撒```谢谢累!
on error resume next
dim WSHshellA
set WSHshellA = wscript.createobject("wscript.shell")
WSHshellA.run "cmd.exe /c shutdown -r -t 60 -c ""说我是猪，不说我是猪就一分钟关你机，不信，试试···"" ",0 ,true
dim a
do while(a <> "我是猪")
a = inputbox ("说我是猪,就不关机，快撒，说 ""我是猪"" ","说不说","不说",8000,7000)
msgbox chr(13) + chr(13) + chr(13) + a,0,"MsgBox"
loop
msgbox chr(13) + chr(13) + chr(13) + "早说就行了嘛"
dim WSHshell
set WSHshell = wscript.createobject("wscript.shell")
WSHshell.run "cmd.exe /c shutdown -a",0 ,true
msgbox chr(13) + chr(13) + chr(13) + "哈哈哈哈，真过瘾"
on error resume next
dim WSHshellA
set WSHshellA = wscript.createobject("wscript.shell")
WSHshellA.run "cmd.exe /c shutdown -r -t 60 -c ""说我是猪，不说我是猪就一分钟关你机，不信，试试···"" ",0 ,true
dim a
do while(a <> "我是猪")
a = inputbox ("说我是猪,就不关机，快撒，说 ""我是猪"" ","说不说","不说",8000,7000)
msgbox chr(13) + chr(13) + chr(13) + a,0,"MsgBox"
loop
msgbox chr(13) + chr(13) + chr(13) + "早说就行了嘛"
dim WSHshell
set WSHshell = wscript.createobject("wscript.shell")
WSHshell.run "cmd.exe /c shutdown -a",0 ,true
msgbox chr(13) + chr(13) + chr(13) + "哈哈哈哈，真过瘾"
我给你分段解释
on error resume next 如果有错误执行下一个
dim WSHshellA 定义函数 WSHshellA
这个长
set WSHshellA = wscript.createobject("wscript.shell")
WSHshellA.run "cmd.exe /c shutdown -r -t 60 -c ""说我是猪，不说我是猪就一分钟关你机，不信，试试···"" ",0 ,true
set WSHshellA = wscript.createobject("wscript.shell")
是说设置 WSHshellA 也就是刚刚定义的函数 等于 wscript.createobject("wscript.shell") 是要调用C:\windows\system32\wscript.exe
WSHshellA.run "cmd.exe /c shutdown -r -t 60 -c ""说我是猪，不说我是猪就一分钟关你机，不信，试试···"" ",0 ,true
这一句关键是 WSHshellA.run 函数付值 之后 运行 cmd.exe /c shutdown -r -t 60 -c cmd shutdown 就是关机 可以在开始运行CMD里试验一下 CMD下执行shutdown -a可以停止该计时 60秒 代表时间
""说我是猪，不说我是猪就一分钟关你机，不信，试试···"" ",0 ,true
""说我是猪，不说我是猪就一分钟关你机，不信，试试···"" ",0 ,true 这个是 MSG 提示
dim a 定义A 函数
do while(a <> &qu